home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v10n17.arc / SAFEMOVE.SCR < prev    next >
Text File  |  1991-09-25  |  560b  |  48 lines

  1. n safemove.com
  2. a 100
  3. mov  di,81
  4. mov  ax,20
  5. mov  cx,7F
  6. repe scasb
  7. dec  di
  8. mov  si,di
  9. mov  dx,di
  10. cmp  byte ptr [di],5C
  11. jne  11A
  12. inc  di
  13. mov  si,di
  14. jmp  110
  15. cmp  byte ptr [di],20
  16. jna  122
  17. inc  di
  18. jmp  110
  19. mov  byte ptr [di],0
  20. inc  di
  21. repe scasb
  22. dec  di
  23. mov  bx,di
  24. cmp  byte ptr [di],20
  25. jna  133
  26. inc  di
  27. jmp  12B
  28. cmp  byte ptr [di-1],5C
  29. je   13D
  30. mov  byte ptr [di],5C
  31. inc  di
  32. movsb
  33. cmp  byte ptr [si],0
  34. jne  13D
  35. mov  byte ptr [di],0
  36. mov  ax,5600
  37. mov  di,bx
  38. int  21
  39. jc   151
  40. mov  al,0
  41. mov  ah,4C
  42. int  21
  43.  
  44. r cx
  45. 55
  46. w
  47. q
  48.